home *** CD-ROM | disk | FTP | other *** search
/ STraTOS 1997 April & May / STraTOS 1 - 1997 April & May.iso / CD01 / INTERNET / SITES / GRAHAM / XA_6S.ZIP / SOURCE / GRAF_BOX.C < prev    next >
Encoding:
C/C++ Source or Header  |  1996-04-29  |  1.1 KB  |  64 lines

  1. /*
  2.  * XaAES - XaAES Ain't the AES
  3.  *
  4.  * A multitasking AES replacement for MiNT
  5.  *
  6.  */
  7.  
  8. #include <VDI.H>
  9. #include "XA_DEFS.H"
  10. #include "XA_TYPES.H"
  11. #include "K_DEFS.H"
  12. #include "XA_GLOBL.H"
  13. #include "DRAG_BOX.H"
  14. #include "WATCHBOX.H"
  15.  
  16. /*
  17.     INTERFACE TO INTERACTIVE BOX ROUTINES
  18. */
  19.  
  20. unsigned long XA_graf_dragbox(short clnt_pid, AESPB *pb)
  21. {
  22.     short x,y;
  23.     
  24.     drag_box(pb->intin[0],
  25.                 pb->intin[1],
  26.                 pb->intin[2],
  27.                 pb->intin[3],
  28.                 pb->intin[4],
  29.                 pb->intin[5],
  30.                 pb->intin[6],
  31.                 pb->intin[7],
  32.                 &x,&y);
  33.     
  34.     pb->intout[0]=1;
  35.     pb->intout[1]=x;
  36.     pb->intout[2]=y;
  37.     
  38.     return XAC_DONE;
  39. }
  40.  
  41. unsigned long XA_graf_rubberbox(short clnt_pid, AESPB *pb)
  42. {
  43.     short w,h;
  44.     
  45.     rubber_box(pb->intin[0],
  46.                 pb->intin[1],
  47.                 pb->intin[2],
  48.                 pb->intin[3],
  49.                 &w,&h);
  50.  
  51.     pb->intout[0]=1;
  52.     pb->intout[1]=w;
  53.     pb->intout[2]=h;
  54.     
  55.     return XAC_DONE;
  56. }
  57.  
  58. unsigned long XA_graf_watchbox(short clnt_pid, AESPB *pb)
  59. {
  60.     pb->intout[0]=watch_object((OBJECT*)pb->addrin[0], pb->intin[1], pb->intin[2], pb->intin[3]);
  61.     return XAC_DONE;
  62. }
  63.  
  64.